Apple Reference & Presen…rary 6 (Reseller Edition)/Apple Ref. & Pres. Lib.v6.0.toast/mac/3-Presentations/Markets/Education/HyperCard In Education/Novel Template/background_5314.txt

Text File | 1990-04-02 | 6KB | 254 lines

-- background: 5314 from stack: in
-- bmap block id: 15822
-- flags: 0000
-- background id: 0
-- name: Plot Menu


-- part 16 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=19 top=287 right=324 bottom=57
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: To Menu
----- HyperTalk script -----
on mouseUp
  play "harpsichord" gt f e d cq
  visual effect iris close
  go to card "Novel Menu"
end mouseUp




-- part 29 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=60 top=213 right=232 bottom=78
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Event 1
----- HyperTalk script -----
on mouseDown
  set hilite of bkgnd button "Event 1" to true
end mouseDown
on mouseUp
  set hilite of bkgnd button "Event 1" to false
  go to card "Plot 1"
  wait for 2 seconds
  go to card "Event 1"
end mouseUp


-- part 30 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=105 top=198 right=215 bottom=123
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Event 2
----- HyperTalk script -----
on mouseDown
  set hilite of bkgnd button "Event 2" to true
end mouseDown
on mouseUp
  set hilite of bkgnd button "Event 2" to false
  go to card "Plot 2"
  wait for 2 seconds
  go to card "Event 2"
end mouseUp


-- part 31 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=150 top=192 right=209 bottom=168
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: event 3
----- HyperTalk script -----
on mouseDown
  set hilite of bkgnd button "Event 3" to true
end mouseDown
on mouseUp
  set hilite of bkgnd button "Event 3" to false
  go to card "Plot 3"
  wait for 2 seconds
  go to card "Event 3"
end mouseUp


-- part 32 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=211 top=169 right=185 bottom=228
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: event 4
----- HyperTalk script -----
on mouseDown
  set hilite of bkgnd button "Event 4" to true
end mouseDown
on mouseUp
  set hilite of bkgnd button "Event 4" to false
  go to card "Plot 4"
  wait for 2 seconds
  go to card "Event 4"
end mouseUp


-- part 33 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=279 top=150 right=165 bottom=296
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Event 5
----- HyperTalk script -----
on mouseDown
  set hilite of bkgnd button "Event 5" to true
end mouseDown
on mouseUp
  set hilite of bkgnd button "Event 5" to false
  go to card "Plot 5"
  wait for 2 seconds
  go to card "Event 5"
end mouseUp


-- part 34 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=346 top=118 right=134 bottom=364
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Event 6
----- HyperTalk script -----
on mouseDown
  set hilite of bkgnd button "Event 6" to true
end mouseDown
on mouseUp
  set hilite of bkgnd button "Event 6" to false
  go to card "Plot 6"
  wait for 2 seconds
  go to card "Event 6"
end mouseUp


-- part 35 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=408 top=80 right=96 bottom=424
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Event 7
----- HyperTalk script -----
on mouseDown
  set hilite of bkgnd button "Event 7" to true
end mouseDown
on mouseUp
  set hilite of bkgnd button "Event 7" to false
  go to card "Plot 7"
  wait for 2 seconds
  go to card "Event 7"
end mouseUp


-- part 36 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=455 top=225 right=241 bottom=473
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Event 8
----- HyperTalk script -----
on mouseDown
  set hilite of bkgnd button "Event 8" to true
end mouseDown
on mouseUp
  set hilite of bkgnd button "Event 8" to false
  go to card "Plot 8"
  wait for 2 seconds
  go to card "Event 8"
end mouseUp


-- part 37 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=38 top=33 right=67 bottom=199
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 33
-- text size: 24
-- style flags: 256
-- line height: 32
-- part name:


-- part 38 (button)
-- low flags: 00
-- high flags: A002
-- rect: left=16 top=319 right=340 bottom=76
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Return
----- HyperTalk script -----
on mouseUp
  global ReturnCard
  go ReturnCard
end mouseUp